##### #####################################################################
#####
#####                         Master script

rm(list= ls())

system("Rscript 01_data_prep.R")
system("Rscript 02_analysis_main.R")
system("Rscript 03_analysis_appendix.R")


